5 DV=PEEK(186):IFDV<8THENDV=8
10 POKE53281,.:POKE53280,0:PRINT"[147]"
20 GOSUB260
30 SYS57812"PSBX 26",DV,0:POKE780,0:POKE781,0:POKE782,48:SYS65493
40 POKE53272,29
50 B$="      [221][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][221]"
70 PRINT"      [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
80 FORI=1TO7:PRINTB$:NEXT
90 PRINT"      [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
100 POKE214,9:PRINT
120 PRINTTAB(12)"[212]HE[208][213][218][218][204][197][208][193][199][197]"
140 PRINTTAB(10)"[154][193][159][204][207][193][196][211][212][193][210][154][197][216][195][204][213][211][201][214][197]"
170 SYS57812"SSX 26",DV,0:POKE780,0:POKE781,16:POKE782,205:SYS65493
200 PRINT"[144]LOAD"CHR$(34)"MOVIE 26"CHR$(34)","DV
210 PRINT"RUN"
220 POKE43,1:POKE44,64:POKE16384,0
230 POKE631,13:POKE632,13:POKE633,13:POKE198,3
240 NEW
250 :
260 POKE214,15:PRINT
270 PRINT"  [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
280 PRINT"  [152]                                    "
290 PRINT"          [205] [207] [214] [201] [197]   [199] [210] [193] [205]         "
300 PRINT"     [194]Y [194]ARBARA [200]. [211]CHULAK (C) 1994   "
310 PRINT"       [208]UBLISHED ON [204][207][193][196][211][212][193][210] #126     "
320 PRINT"      [211]UBSCRIPTIONS 1-800-594-3370    "
330 PRINT"           [193][204][204] [210][201][199][200][212][211] [210][197][211][197][210][214][197][196]        "
340 PRINT"                                      "
350 PRINT"  [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185]"
360 RETURN
10000 OPEN15,8,15,"S0:MOVIE BOOT 26":CLOSE15:SAVE"0:MOVIE BOOT 26",8:END